﻿Public Class VeDto
    Dim _MaGhe As Integer
    Dim _MaLich As Long
    Dim _TinhTrang As Boolean
    Dim _LoaiVe As Long

    Sub New()
        _MaGhe = 0
        _MaLich = 0
        _TinhTrang = False
        _LoaiVe = 0
    End Sub

    Public Property MaGhe() As Integer
        Get
            Return Me._MaGhe
        End Get
        Set(ByVal value As Integer)
            Me._MaGhe = value
        End Set
    End Property


    Public Property MaLich() As Long
        Get
            Return Me._MaLich
        End Get
        Set(ByVal value As Long)
            Me._MaLich = value
        End Set
    End Property


    Public Property TinhTrang() As Boolean
        Get
            Return Me._TinhTrang
        End Get
        Set(ByVal value As Boolean)
            Me._TinhTrang = value
        End Set
    End Property


    Public Property LoaiVe() As Long
        Get
            Return Me._LoaiVe
        End Get
        Set(ByVal value As Long)
            Me._LoaiVe = value
        End Set
    End Property

End Class
